Imports Microsoft.VisualBasic

Public Class presupuestosubproyecto
    Private _id As Integer
    Private _nombreSubProyecto As String
    Private _descripcionSubProyecto As String
    Private _observacionTaller As String
    Private _notasAlCliente As String
    Private _notasVentas As String
    Private _fkPresupuesto As String
    Private _itemaprovado As String
    Private _arrayMateriales As New ArrayList
    Private _arrayActividades As New ArrayList

    Public Sub New(ByVal id As Integer, ByVal nombreSubProyecto As String, ByVal descripcionSubProyecto As String, ByVal observacionTaller As String, _
                    ByVal notasAlCliente As String, ByVal notasVentas As String, ByVal fkPresupuesto As String, ByVal itemaprovado As String)
        _id = id
        _nombreSubProyecto = nombreSubProyecto
        _descripcionSubProyecto = descripcionSubProyecto
        _observacionTaller = observacionTaller
        _notasAlCliente = notasAlCliente
        _notasVentas = notasVentas
        _fkPresupuesto = fkPresupuesto
        _itemaprovado = itemaprovado
    End Sub

    Property id() As Integer
        Get
            Return _id
        End Get

        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Property nombreSubProyecto() As String
        Get
            Return _nombreSubProyecto
        End Get

        Set(ByVal value As String)
            _nombreSubProyecto = value
        End Set
    End Property

    Property descripcionSubProyecto() As String
        Get
            Return _descripcionSubProyecto
        End Get

        Set(ByVal value As String)
            _descripcionSubProyecto = value
        End Set
    End Property

    Property observacionTaller() As String
        Get
            Return _observacionTaller
        End Get

        Set(ByVal value As String)
            _observacionTaller = value
        End Set
    End Property

    Property notasAlCliente() As String
        Get
            Return _notasAlCliente
        End Get

        Set(ByVal value As String)
            _notasAlCliente = value
        End Set
    End Property

    Property notasVentas() As String
        Get
            Return _notasVentas
        End Get

        Set(ByVal value As String)
            _notasVentas = value
        End Set
    End Property

    Property fkPresupuesto() As String
        Get
            Return _fkPresupuesto
        End Get

        Set(ByVal value As String)
            _fkPresupuesto = value
        End Set
    End Property

    Property arrayMateriales() As ArrayList
        Get
            Return _arrayMateriales
        End Get

        Set(ByVal value As ArrayList)
            _arrayMateriales = value
        End Set
    End Property

    Property arrayActividades() As ArrayList
        Get
            Return _arrayActividades
        End Get

        Set(ByVal value As ArrayList)
            _arrayActividades = value
        End Set
    End Property

    Property itemaprovado() As String
        Get
            Return _itemaprovado
        End Get

        Set(ByVal value As String)
            _itemaprovado = value
        End Set
    End Property
End Class
